home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / arvis1 / trainsma.frm < prev    next >
Text File  |  1999-10-08  |  52KB  |  1,558 lines
  1. VERSION 5.00
  2. Object = "{27395F88-0C0C-101B-A3C9-08002B2F49FB}#1.1#0"; "PICCLP32.OCX"
  3. Begin VB.Form TrainFrm 
  4.    BorderStyle     =   0  'None
  5.    Caption         =   "QuadBallTraining"
  6.    ClientHeight    =   9930
  7.    ClientLeft      =   0
  8.    ClientTop       =   0
  9.    ClientWidth     =   12855
  10.    ClipControls    =   0   'False
  11.    ControlBox      =   0   'False
  12.    BeginProperty Font 
  13.       Name            =   "Times New Roman"
  14.       Size            =   8.25
  15.       Charset         =   0
  16.       Weight          =   400
  17.       Underline       =   0   'False
  18.       Italic          =   0   'False
  19.       Strikethrough   =   0   'False
  20.    EndProperty
  21.    Icon            =   "TrainSmallFrm.frx":0000
  22.    LinkTopic       =   "Form1"
  23.    MaxButton       =   0   'False
  24.    MinButton       =   0   'False
  25.    Moveable        =   0   'False
  26.    ScaleHeight     =   9930
  27.    ScaleWidth      =   12855
  28.    ShowInTaskbar   =   0   'False
  29.    StartUpPosition =   2  'CenterScreen
  30.    WindowState     =   2  'Maximized
  31.    Begin VB.PictureBox StatBox 
  32.       Appearance      =   0  'Flat
  33.       AutoSize        =   -1  'True
  34.       BackColor       =   &H00C000C0&
  35.       BorderStyle     =   0  'None
  36.       BeginProperty Font 
  37.          Name            =   "MS Sans Serif"
  38.          Size            =   8.25
  39.          Charset         =   0
  40.          Weight          =   400
  41.          Underline       =   0   'False
  42.          Italic          =   0   'False
  43.          Strikethrough   =   0   'False
  44.       EndProperty
  45.       ForeColor       =   &H80000008&
  46.       Height          =   2805
  47.       Left            =   0
  48.       ScaleHeight     =   2805
  49.       ScaleWidth      =   3570
  50.       TabIndex        =   24
  51.       Top             =   0
  52.       Visible         =   0   'False
  53.       Width           =   3570
  54.       Begin VB.Label OK 
  55.          AutoSize        =   -1  'True
  56.          BackStyle       =   0  'Transparent
  57.          Caption         =   "Continue"
  58.          BeginProperty Font 
  59.             Name            =   "Times New Roman"
  60.             Size            =   36
  61.             Charset         =   0
  62.             Weight          =   700
  63.             Underline       =   0   'False
  64.             Italic          =   0   'False
  65.             Strikethrough   =   0   'False
  66.          EndProperty
  67.          ForeColor       =   &H00008000&
  68.          Height          =   825
  69.          Left            =   7605
  70.          TabIndex        =   34
  71.          Tag             =   "No"
  72.          Top             =   7380
  73.          Width           =   2805
  74.       End
  75.       Begin VB.Label HighTime 
  76.          AutoSize        =   -1  'True
  77.          BackStyle       =   0  'Transparent
  78.          Caption         =   "SCORE"
  79.          BeginProperty Font 
  80.             Name            =   "Times New Roman"
  81.             Size            =   36
  82.             Charset         =   0
  83.             Weight          =   700
  84.             Underline       =   0   'False
  85.             Italic          =   0   'False
  86.             Strikethrough   =   0   'False
  87.          EndProperty
  88.          ForeColor       =   &H0000FFFF&
  89.          Height          =   825
  90.          Left            =   4185
  91.          TabIndex        =   40
  92.          Top             =   4230
  93.          Width           =   2490
  94.       End
  95.       Begin VB.Label AllTime 
  96.          AutoSize        =   -1  'True
  97.          BackStyle       =   0  'Transparent
  98.          Caption         =   "SCORE"
  99.          BeginProperty Font 
  100.             Name            =   "Times New Roman"
  101.             Size            =   36
  102.             Charset         =   0
  103.             Weight          =   700
  104.             Underline       =   0   'False
  105.             Italic          =   0   'False
  106.             Strikethrough   =   0   'False
  107.          EndProperty
  108.          ForeColor       =   &H0000FFFF&
  109.          Height          =   825
  110.          Left            =   4185
  111.          TabIndex        =   39
  112.          Top             =   3015
  113.          Width           =   2490
  114.       End
  115.       Begin VB.Label Label6 
  116.          Alignment       =   1  'Right Justify
  117.          BackStyle       =   0  'Transparent
  118.          Caption         =   "Highest Time"
  119.          BeginProperty Font 
  120.             Name            =   "Times New Roman"
  121.             Size            =   27.75
  122.             Charset         =   0
  123.             Weight          =   400
  124.             Underline       =   0   'False
  125.             Italic          =   0   'False
  126.             Strikethrough   =   0   'False
  127.          EndProperty
  128.          ForeColor       =   &H0000FF00&
  129.          Height          =   645
  130.          Left            =   315
  131.          TabIndex        =   38
  132.          Top             =   4320
  133.          Width           =   3480
  134.       End
  135.       Begin VB.Label Label4 
  136.          Alignment       =   1  'Right Justify
  137.          BackStyle       =   0  'Transparent
  138.          Caption         =   "Total Time"
  139.          BeginProperty Font 
  140.             Name            =   "Times New Roman"
  141.             Size            =   27.75
  142.             Charset         =   0
  143.             Weight          =   400
  144.             Underline       =   0   'False
  145.             Italic          =   0   'False
  146.             Strikethrough   =   0   'False
  147.          EndProperty
  148.          ForeColor       =   &H0000FF00&
  149.          Height          =   510
  150.          Left            =   945
  151.          TabIndex        =   37
  152.          Top             =   3105
  153.          Width           =   2850
  154.       End
  155.       Begin VB.Label Label9 
  156.          AutoSize        =   -1  'True
  157.          BackStyle       =   0  'Transparent
  158.          Caption         =   "Game Statistics"
  159.          BeginProperty Font 
  160.             Name            =   "Times New Roman"
  161.             Size            =   48
  162.             Charset         =   0
  163.             Weight          =   400
  164.             Underline       =   -1  'True
  165.             Italic          =   0   'False
  166.             Strikethrough   =   0   'False
  167.          EndProperty
  168.          ForeColor       =   &H00FFFF00&
  169.          Height          =   1095
  170.          Left            =   900
  171.          TabIndex        =   31
  172.          Top             =   270
  173.          Width           =   5985
  174.       End
  175.       Begin VB.Label TotalBounces 
  176.          AutoSize        =   -1  'True
  177.          BackStyle       =   0  'Transparent
  178.          Caption         =   "TotalBounces"
  179.          BeginProperty Font 
  180.             Name            =   "Times New Roman"
  181.             Size            =   36
  182.             Charset         =   0
  183.             Weight          =   700
  184.             Underline       =   0   'False
  185.             Italic          =   0   'False
  186.             Strikethrough   =   0   'False
  187.          EndProperty
  188.          ForeColor       =   &H0000FFFF&
  189.          Height          =   825
  190.          Left            =   4230
  191.          TabIndex        =   30
  192.          Top             =   6615
  193.          Width           =   4185
  194.       End
  195.       Begin VB.Label TopSpeed 
  196.          AutoSize        =   -1  'True
  197.          BackStyle       =   0  'Transparent
  198.          Caption         =   "TopSpeed"
  199.          BeginProperty Font 
  200.             Name            =   "Times New Roman"
  201.             Size            =   36
  202.             Charset         =   0
  203.             Weight          =   700
  204.             Underline       =   0   'False
  205.             Italic          =   0   'False
  206.             Strikethrough   =   0   'False
  207.          EndProperty
  208.          ForeColor       =   &H0000FFFF&
  209.          Height          =   825
  210.          Left            =   4185
  211.          TabIndex        =   29
  212.          Top             =   5400
  213.          Width           =   3090
  214.       End
  215.       Begin VB.Label TotalScore 
  216.          AutoSize        =   -1  'True
  217.          BackStyle       =   0  'Transparent
  218.          Caption         =   "SCORE"
  219.          BeginProperty Font 
  220.             Name            =   "Times New Roman"
  221.             Size            =   36
  222.             Charset         =   0
  223.             Weight          =   700
  224.             Underline       =   0   'False
  225.             Italic          =   0   'False
  226.             Strikethrough   =   0   'False
  227.          EndProperty
  228.          Fo